home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue69 / Clinic / QTestU.xfm < prev   
Encoding:
Text File  |  2001-03-15  |  641 b   |  34 lines
  1. object Form1: TForm1
  2.   Left = 192
  3.   Top = 144
  4.   Width = 255
  5.   Height = 174
  6.   HorzScrollBar.Range = 193
  7.   VertScrollBar.Range = 121
  8.   ActiveControl = Button1
  9.   Caption = 'Form1'
  10.   Color = clBackground
  11.   OnCreate = FormCreate
  12.   PixelsPerInch = 96
  13.   TextHeight = 15
  14.   TextWidth = 7
  15.   object Button1: TButton
  16.     Left = 40
  17.     Top = 96
  18.     Width = 153
  19.     Height = 25
  20.     Caption = 'Access interface property'
  21.     TabOrder = 0
  22.     OnClick = Button1Click
  23.   end
  24.   object IntfPropTest1: TIntfPropTest
  25.     IntfProp = IntfImplementor1
  26.     Left = 48
  27.     Top = 40
  28.   end
  29.   object IntfImplementor1: TIntfImplementor
  30.     Left = 152
  31.     Top = 40
  32.   end
  33. end
  34.